home *** CD-ROM | disk | FTP | other *** search
- atalk <- AmigaTalk new
- nar <- Narrator new
-
- nar setVolume: 64
- nar setSex: 1
- nar setPitch: 100
- nar setMode: 'natural'
-
- nar speak: 'Hello there. Performing the eye nishulizashun sKript will take some time.'
- nar speak: 'This will N Able your programs to run at, full speed later.'
-
- 'Instantiating DataTypeSystem Singleton Class (dataTypeSystem)...' print
- dataTypeSystem <- DataTypeSystem new
-
- nar speak: 'Done eye nishulizing the Date a Type System Class.'
-
- 'Instantiating PrtRPFlags Singleton Class (prtRPFlags)...' print
- prtRPFlags <- PrtRPFlags new
-
- nar speak: 'Done eye nishulizing the Printer Flaggs Class.'
-
- 'Instantiating PrtCommands Singleton Class (prtCommands)...' print
- prtCommands <- PrtCommands new
-
- nar speak: 'Done eye nishulizing the Printer Commandss Class.'
-
- 'Instantiating DosSystem Singleton Class (dosSystem)...' print
- dosSystem <- DosSystem new
-
- nar speak: 'Done eye nishulizing the Dos System Class.'
-
- 'Done with InitializeScript!' print
-
- nar speak: 'Now write some great programs with me!'
-
- nar close
-